home *** CD-ROM | disk | FTP | other *** search
/ Joystick Magazine 2000 November / cd joystick no120 novembre 2000 cd 1.iso / data / demos / gunlok / data1.cab / Program_Executable_Files / scripts / oilfire.gsh < prev    next >
Text File  |  2000-08-22  |  1KB  |  56 lines
  1. // defines OilFire
  2. ////////////////////////////////////////////////////////////////////////////////////
  3.  
  4. // start wrapper - prevent multiple inclusions or recursive inclusions
  5.  
  6. //(this currently causes 'unrecognized preprocessor directive' warnings, until implemented)
  7. #ifndef INCLUDED_OILFIRE_GSH
  8. #define INCLUDED_OILFIRE_GSH
  9.  
  10. ////////////////////////////////////////////////////////////////////////////////////
  11.  
  12. #include "defaults.gsh"
  13.  
  14. pgenerator Pgn_OilFire
  15. {
  16.     type fire
  17.     life infinite
  18.     rate 10
  19.     
  20.     // stream direction
  21.     x    0
  22.     y    -1
  23.     z    0
  24.     
  25.     // particle colour
  26.     red   1
  27.     green 0.4
  28.     blue  0.1
  29.     alpha 1
  30.  
  31.     start scale    1.0
  32.     end scale    0.3
  33.     spin        10000
  34. }
  35.  
  36. light Lit_OilFire
  37. {
  38.     red             4
  39.     green           1.5
  40.     blue            0.2
  41.     specular red    1.5
  42.     specular green    0.5
  43.     specular blue    0
  44.     range           6
  45. }
  46.  
  47. role Rol_OilFire : Rol_PlacedObject
  48. {
  49.     shape Pgn_OilFire
  50.     light Lit_OilFire
  51. }
  52.  
  53. ////////////////////////////////////////////////////////////////////////////////////
  54.  
  55. // end wrapper - for preventing multiple or recursive inclusions
  56. #endif // !INCLUDED_CARFIRE_GSH